home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 2003 August / MW 8 2003 CD1.iso / Inside Macworld / Product News / gimp-1.2.4.sit / gimp-1.2.4 / app / module_db.c < prev    next >
Encoding:
C/C++ Source or Header  |  2001-05-22  |  27.1 KB  |  1,149 lines
  1. /* The GIMP -- an image manipulation program
  2.  * Copyright (C) 1995 Spencer Kimball and Peter Mattis
  3.  *
  4.  * module_db.c (C) 1999 Austin Donnelly <austin@gimp.org>
  5.  *
  6.  * This program is free software; you can redistribute it and/or modify
  7.  * it under the terms of the GNU General Public License as published by
  8.  * the Free Software Foundation; either version 2 of the License, or
  9.  * (at your option) any later version.
  10.  *
  11.  * This program is distributed in the hope that it will be useful,
  12.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.  * GNU General Public License for more details.
  15.  *
  16.  * You should have received a copy of the GNU General Public License
  17.  * along with this program; if not, write to the Free Software
  18.  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  19.  */
  20.  
  21. #include "config.h"
  22.  
  23. #include <glib.h>
  24.  
  25. #include <stdio.h>
  26. #include <string.h>
  27. #include <sys/types.h>
  28. #include <sys/stat.h>
  29. #ifdef HAVE_UNISTD_H
  30. #include <unistd.h>
  31. #endif
  32. #include <time.h>
  33.  
  34. #include <gtk/gtk.h>
  35.  
  36. #include "apptypes.h"
  37.  
  38. #include "appenv.h"
  39. #include "module_db.h"
  40. #include "gimpsignal.h"
  41. #include "gimprc.h"
  42. #include "datafiles.h"
  43. #include "gimpset.h"
  44. #include "gimpui.h"
  45.  
  46. #include "libgimp/gimpenv.h"
  47. #include "libgimp/gimpmodule.h"
  48.  
  49. #include "libgimp/gimpintl.h"
  50.  
  51.  
  52. /* export this to gimprc.c */
  53. gchar *module_db_load_inhibit = NULL;
  54.  
  55. typedef enum
  56. {
  57.   ST_MODULE_ERROR,         /* missing module_load function or other error    */
  58.   ST_LOADED_OK,            /* happy and running (normal state of affairs)    */
  59.   ST_LOAD_FAILED,          /* module_load returned GIMP_MODULE_UNLOAD        */
  60.   ST_UNLOAD_REQUESTED,     /* sent unload request, waiting for callback      */
  61.   ST_UNLOADED_OK           /* callback arrived, module not in memory anymore */
  62. } module_state;
  63.  
  64. static const gchar * const statename[] =
  65. {
  66.   N_("Module error"),
  67.   N_("Loaded OK"),
  68.   N_("Load failed"),
  69.   N_("Unload requested"),
  70.   N_("Unloaded OK")
  71. };
  72.  
  73. #ifdef __EMX__
  74. extern void gimp_color_selector_register   ();
  75. extern void gimp_color_selector_unregister ();
  76. extern void dialog_register                ();
  77. extern void dialog_unregister              ();
  78.  
  79. static struct main_funcs_struc
  80. {
  81.   gchar *name;
  82.   void (*func) ();
  83. } 
  84.  
  85. gimp_main_funcs[] =
  86. {
  87.   { "gimp_color_selector_register",   gimp_color_selector_register },
  88.   { "gimp_color_selector_unregister", gimp_color_selector_unregister },
  89.   { "dialog_register",                dialog_register },
  90.   { "dialog_unregister",              dialog_unregister },
  91.   { NULL, NULL }
  92. };
  93. #endif
  94.  
  95.  
  96. /* one of these objects is kept per-module */
  97. typedef struct
  98. {
  99.   GtkObject       object;
  100.  
  101.   gchar          *fullpath;     /* path to the module                        */
  102.   module_state    state;        /* what's happened to the module             */
  103.   gboolean        ondisk;       /* TRUE if file still exists                 */
  104.   gboolean        load_inhibit; /* user requests not to load at boot time    */
  105.   gint            refs;         /* how many time we're running in the module */
  106.  
  107.   /* stuff from now on may be NULL depending on the state the module is in   */
  108.   GimpModuleInfo *info;         /* returned values from module_init          */
  109.   GModule        *module;       /* handle on the module                      */
  110.   gchar          *last_module_error;
  111.  
  112.   GimpModuleInitFunc   init;
  113.   GimpModuleUnloadFunc unload;
  114. } ModuleInfo;
  115.  
  116.  
  117. static guint module_info_get_type (void);
  118.  
  119. #define MODULE_INFO_TYPE    module_info_get_type()
  120. #define MODULE_INFO(obj)    GTK_CHECK_CAST (obj, MODULE_INFO_TYPE, ModuleInfo)
  121. #define IS_MODULE_INFO(obj) GTK_CHECK_TYPE (obj, MODULE_INFO_TYPE)
  122.  
  123.  
  124. #define NUM_INFO_LINES 7
  125.  
  126. typedef struct
  127. {
  128.   GtkWidget  *table;
  129.   GtkWidget  *label[NUM_INFO_LINES];
  130.   GtkWidget  *button_label;
  131.   ModuleInfo *last_update;
  132.   GtkWidget  *button;
  133.   GtkWidget  *list;
  134.   GtkWidget  *load_inhibit_check;
  135. } BrowserState;
  136.  
  137. /* global set of module_info pointers */
  138. static GimpSet          *modules;
  139. static GimpSetHandlerId  modules_handler;
  140.  
  141. /* If the inhibit state of any modules changes, we might need to
  142.  * re-write the modulerc. */
  143. static gboolean need_to_rewrite_modulerc = FALSE;
  144.  
  145.  
  146. /* debug control: */
  147.  
  148. /*#define DUMP_DB*/
  149. /*#define DEBUG*/
  150.  
  151. #ifdef DEBUG
  152. #undef DUMP_DB
  153. #define DUMP_DB
  154. #define TRC(x) printf x
  155. #else
  156. #define TRC(x)
  157. #endif
  158.  
  159.  
  160. /* prototypes */
  161. static void         module_initialize      (gchar        *filename);
  162. static void         mod_load               (ModuleInfo   *mod,
  163.                         gboolean      verbose);
  164. static void         mod_unload             (ModuleInfo   *mod,
  165.                         gboolean      verbose);
  166. static gboolean     mod_idle_unref         (ModuleInfo   *mod);
  167. static ModuleInfo * module_find_by_path    (const gchar  *fullpath);
  168.  
  169. #ifdef DUMP_DB
  170. static void   print_module_info            (gpointer      data,
  171.                         gpointer      user_data);
  172. #endif
  173.  
  174. static void   browser_popdown_callback     (GtkWidget    *widget,
  175.                         gpointer      data);
  176. static void   browser_destroy_callback     (GtkWidget    *widget,
  177.                         gpointer      data);
  178. static void   browser_info_update          (ModuleInfo   *mod,
  179.                         BrowserState *st);
  180. static void   browser_info_add             (GimpSet      *set,
  181.                         ModuleInfo   *mod,
  182.                         BrowserState *st);
  183. static void   browser_info_remove          (GimpSet      *set,
  184.                         ModuleInfo   *mod,
  185.                         BrowserState *st);
  186. static void   browser_info_init            (BrowserState *st,
  187.                         GtkWidget    *table);
  188. static void   browser_select_callback      (GtkWidget    *widget,
  189.                         GtkWidget    *child);
  190. static void   browser_load_unload_callback (GtkWidget    *widget,
  191.                         gpointer      data);
  192. static void   browser_refresh_callback     (GtkWidget    *widget,
  193.                         gpointer      data);
  194. static void   make_list_item               (gpointer      data,
  195.                         gpointer      user_data);
  196.  
  197. static void   gimp_module_ref              (ModuleInfo   *mod);
  198. static void   gimp_module_unref            (ModuleInfo   *mod);
  199.  
  200.  
  201.  
  202. /**************************************************************/
  203. /* Exported functions */
  204.  
  205. void
  206. module_db_init (void)
  207. {
  208.   gchar *filename;
  209.  
  210.   /* load the modulerc file */
  211.   filename = gimp_personal_rc_file ("modulerc");
  212.   parse_gimprc_file (filename);
  213.   g_free (filename);
  214.  
  215.   /* Load and initialize gimp modules */
  216.  
  217.   modules = gimp_set_new (MODULE_INFO_TYPE, FALSE);
  218.  
  219.   if (g_module_supported ())
  220.     datafiles_read_directories (module_path,
  221.                 module_initialize, 0 /* no flags */);
  222. #ifdef DUMP_DB
  223.   gimp_set_foreach (modules, print_module_info, NULL);
  224. #endif
  225. }
  226.  
  227. static void
  228. free_a_single_module (gpointer data, 
  229.               gpointer user_data)
  230. {
  231.   ModuleInfo *mod = data;
  232.  
  233.   if (mod->module && mod->unload && mod->state == ST_LOADED_OK)
  234.     {
  235.       mod_unload (mod, FALSE);
  236.     }
  237. }
  238.  
  239. static void
  240. add_to_inhibit_string (gpointer data, 
  241.                gpointer user_data)
  242. {
  243.   ModuleInfo *mod = data;
  244.   GString    *str = user_data;
  245.  
  246.   if (mod->load_inhibit)
  247.     {
  248.       str = g_string_append_c (str, G_SEARCHPATH_SEPARATOR);
  249.       str = g_string_append (str, mod->fullpath);
  250.     }
  251. }
  252.  
  253.  
  254. static gboolean
  255. module_db_write_modulerc (void)
  256. {
  257.   GString  *str;
  258.   gchar    *p;
  259.   gchar    *filename;
  260.   FILE     *fp;
  261.   gboolean  saved = FALSE;
  262.  
  263.   str = g_string_new (NULL);
  264.   gimp_set_foreach (modules, add_to_inhibit_string, str);
  265.   if (str->len > 0)
  266.     p = str->str + 1;
  267.   else
  268.     p = "";
  269.  
  270.   filename = gimp_personal_rc_file ("modulerc");
  271.   fp = fopen (filename, "wt");
  272.   g_free (filename);
  273.   if (fp)
  274.     {
  275.       fprintf (fp, "(module-load-inhibit \"%s\")\n", p);
  276.       fclose (fp);
  277.       saved = TRUE;
  278.     }
  279.  
  280.   g_string_free (str, TRUE);
  281.   return (saved);
  282. }
  283.  
  284.  
  285. void
  286. module_db_free (void)
  287. {
  288.   if (need_to_rewrite_modulerc)
  289.     {
  290.       if (module_db_write_modulerc ())
  291.     {
  292.       need_to_rewrite_modulerc = FALSE;
  293.     }
  294.     }
  295.   gimp_set_foreach (modules, free_a_single_module, NULL);
  296. }
  297.  
  298.  
  299. GtkWidget *
  300. module_db_browser_new (void)
  301. {
  302.   GtkWidget *shell;
  303.   GtkWidget *hbox;
  304.   GtkWidget *vbox;
  305.   GtkWidget *listbox;
  306.   GtkWidget *button;
  307.   BrowserState *st;
  308.  
  309.   shell = gimp_dialog_new (_("Module DB"), "module_db_dialog",
  310.                gimp_standard_help_func,
  311.                "dialogs/module_browser.html",
  312.                GTK_WIN_POS_NONE,
  313.                FALSE, TRUE, FALSE,
  314.  
  315.                _("OK"), browser_popdown_callback,
  316.                NULL, NULL, NULL, TRUE, TRUE,
  317.  
  318.                NULL);
  319.  
  320.   vbox = gtk_vbox_new (FALSE, 5);
  321.   gtk_container_set_border_width (GTK_CONTAINER (vbox), 5);
  322.   gtk_container_add (GTK_CONTAINER (GTK_DIALOG (shell)->vbox), vbox);
  323.   gtk_widget_show (vbox);
  324.  
  325.   listbox = gtk_scrolled_window_new (NULL, NULL);
  326.   gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (listbox),
  327.                   GTK_POLICY_AUTOMATIC,
  328.                   GTK_POLICY_AUTOMATIC);
  329.   gtk_box_pack_start (GTK_BOX (vbox), listbox, TRUE, TRUE, 0);
  330.   gtk_widget_set_usize (listbox, 125, 100);
  331.   gtk_widget_show (listbox);
  332.  
  333.   st = g_new0 (BrowserState, 1);
  334.  
  335.   st->list = gtk_list_new ();
  336.   gtk_list_set_selection_mode (GTK_LIST (st->list), GTK_SELECTION_BROWSE);
  337.   gtk_scrolled_window_add_with_viewport (GTK_SCROLLED_WINDOW (listbox),
  338.                      st->list);
  339.  
  340.   gimp_set_foreach (modules, make_list_item, st);
  341.  
  342.   gtk_widget_show (st->list);
  343.  
  344.   st->table = gtk_table_new (5, NUM_INFO_LINES + 1, FALSE);
  345.   gtk_table_set_col_spacings (GTK_TABLE (st->table), 4);  
  346.   gtk_box_pack_start (GTK_BOX (vbox), st->table, FALSE, FALSE, 0);
  347.   gtk_widget_show (st->table);
  348.  
  349.   hbox = gtk_hbutton_box_new ();
  350.   gtk_button_box_set_layout (GTK_BUTTON_BOX (hbox), GTK_BUTTONBOX_SPREAD);
  351.  
  352.   gtk_widget_show (hbox);
  353.   gtk_box_pack_start (GTK_BOX (vbox), hbox, TRUE, FALSE, 5);
  354.  
  355.   button = gtk_button_new_with_label (_("Refresh"));
  356.   gtk_widget_show (button);
  357.   gtk_signal_connect (GTK_OBJECT (button), "clicked",
  358.               browser_refresh_callback, st);
  359.   gtk_box_pack_start (GTK_BOX (hbox), button, TRUE, TRUE, 0);
  360.  
  361.   st->button = gtk_button_new_with_label ("");
  362.   st->button_label = GTK_BIN (st->button)->child;
  363.   gtk_box_pack_start (GTK_BOX (hbox), st->button, TRUE, TRUE, 0);
  364.   gtk_widget_show (st->button);
  365.   gtk_signal_connect (GTK_OBJECT (st->button), "clicked",
  366.               browser_load_unload_callback, st);
  367.  
  368.   browser_info_init (st, st->table);
  369.   browser_info_update (st->last_update, st);
  370.  
  371.   gtk_object_set_user_data (GTK_OBJECT (st->list), st);
  372.  
  373.   gtk_signal_connect (GTK_OBJECT (st->list), "select_child",
  374.               browser_select_callback, NULL);
  375.  
  376.   /* hook the gimpset signals so we can refresh the display
  377.    * appropriately. */
  378.   modules_handler =
  379.     gimp_set_add_handler (modules, "modified", browser_info_update, st);
  380.  
  381.   gtk_signal_connect (GTK_OBJECT (modules), "add", 
  382.               browser_info_add, st);
  383.   gtk_signal_connect (GTK_OBJECT (modules), "remove", 
  384.               browser_info_remove, st);
  385.  
  386.   gtk_signal_connect (GTK_OBJECT (shell), "destroy",
  387.               browser_destroy_callback, st);
  388.  
  389.   return shell;
  390. }
  391.  
  392.  
  393. /**************************************************************/
  394. /* ModuleInfo object glue */
  395.  
  396.  
  397. typedef struct
  398. {
  399.   GtkObjectClass parent_class;
  400. } ModuleInfoClass;
  401.  
  402. enum
  403. {
  404.   MODIFIED,
  405.   LAST_SIGNAL
  406. };
  407. static guint module_info_signals[LAST_SIGNAL];
  408.  
  409.  
  410. static void
  411. module_info_destroy (GtkObject *object)
  412. {
  413.   ModuleInfo *mod = MODULE_INFO (object);
  414.  
  415.   /* if this trips, then we're onto some serious lossage in a moment */
  416.   g_return_if_fail (mod->refs == 0);
  417.  
  418.   if (mod->last_module_error)
  419.     g_free (mod->last_module_error);
  420.   g_free (mod->fullpath);
  421. }
  422.  
  423. static void
  424. module_info_class_init (ModuleInfoClass *klass)
  425. {
  426.   GtkObjectClass *object_class;
  427.   GtkType type;
  428.  
  429.   object_class = GTK_OBJECT_CLASS (klass);
  430.  
  431.   type = object_class->type;
  432.  
  433.   object_class->destroy = module_info_destroy;
  434.  
  435.   module_info_signals[MODIFIED] =
  436.     gimp_signal_new ("modified", 0, type, 0, gimp_sigtype_void);
  437.  
  438.   gtk_object_class_add_signals (object_class, module_info_signals, LAST_SIGNAL);
  439. }
  440.  
  441. static void
  442. module_info_init (ModuleInfo *mod)
  443. {
  444.   /* don't need to do anything */
  445. }
  446.  
  447. static guint
  448. module_info_get_type (void)
  449. {
  450.   static guint module_info_type = 0;
  451.  
  452.   if (!module_info_type)
  453.     {
  454.       static const GtkTypeInfo module_info_info =
  455.       {
  456.     "ModuleInfo",
  457.     sizeof (ModuleInfo),
  458.     sizeof (ModuleInfoClass),
  459.     (GtkClassInitFunc) module_info_class_init,
  460.     (GtkObjectInitFunc) module_info_init,
  461.     /* reserved_1 */ NULL,
  462.         /* reserved_2 */ NULL,
  463.         (GtkClassInitFunc) NULL,
  464.       };
  465.  
  466.       module_info_type =
  467.     gtk_type_unique (gtk_object_get_type (), &module_info_info);
  468.     }
  469.  
  470.   return module_info_type;
  471. }
  472.  
  473. /* exported API: */
  474.  
  475. static void
  476. module_info_modified (ModuleInfo *mod)
  477. {
  478.   gtk_signal_emit (GTK_OBJECT (mod), module_info_signals[MODIFIED]);
  479. }
  480.  
  481. static ModuleInfo *
  482. module_info_new (void)
  483. {
  484.   return MODULE_INFO (gtk_type_new (module_info_get_type ()));
  485. }
  486.  
  487. static void
  488. module_info_free (ModuleInfo *mod)
  489. {
  490.   gtk_object_unref (GTK_OBJECT (mod));
  491. }
  492.  
  493.  
  494. /**************************************************************/
  495. /* helper functions */
  496.  
  497.  
  498. /* name must be of the form lib*.so (Unix) or *.dll (Win32) */
  499. static gboolean
  500. valid_module_name (const gchar *filename)
  501. {
  502.   const gchar *basename;
  503.   gint len;
  504.  
  505.   basename = g_basename (filename);
  506.  
  507.   len = strlen (basename);
  508.  
  509. #if !defined(G_OS_WIN32) && !defined(G_WITH_CYGWIN) && !defined(__EMX__)
  510.   if (len < 3 + 1 + 3)
  511.     return FALSE;
  512.  
  513.   if (strncmp (basename, "lib", 3))
  514.     return FALSE;
  515.  
  516.   if (strcmp (basename + len - 3, ".so"))
  517.     return FALSE;
  518. #else
  519.   if (len < 1 + 4)
  520.       return FALSE;
  521.  
  522.   if (g_strcasecmp (basename + len - 4, ".dll"))
  523.     return FALSE;
  524. #endif
  525.  
  526.   return TRUE;
  527. }
  528.  
  529.  
  530. static gboolean
  531. module_inhibited (const gchar *fullpath, 
  532.           const gchar *inhibit_list)
  533. {
  534.   gchar *p;
  535.   gint   pathlen;
  536.   const gchar *start;
  537.   const gchar *end;
  538.  
  539.   /* common case optimisation: the list is empty */
  540.   if (!inhibit_list || *inhibit_list == '\000')
  541.     return FALSE;
  542.  
  543.   p = strstr (inhibit_list, fullpath);
  544.   if (!p)
  545.     return FALSE;
  546.  
  547.   /* we have a substring, but check for colons either side */
  548.   start = p;
  549.   while (start != inhibit_list && *start != G_SEARCHPATH_SEPARATOR)
  550.       start--;
  551.   if (*start == G_SEARCHPATH_SEPARATOR)
  552.       start++;
  553.  
  554.   end = strchr (p, G_SEARCHPATH_SEPARATOR);
  555.   if (!end)
  556.     end = inhibit_list + strlen (inhibit_list);
  557.  
  558.   pathlen = strlen (fullpath);
  559.   if ((end - start) == pathlen)
  560.     return TRUE;
  561.   else
  562.     return FALSE;
  563. }
  564.  
  565.  
  566. static void
  567. module_initialize (gchar *filename)
  568. {
  569.   ModuleInfo *mod;
  570.  
  571.   if (!valid_module_name (filename))
  572.     return;
  573.  
  574.   /* don't load if we already know about it */
  575.   if (module_find_by_path (filename))
  576.     return;
  577.  
  578.   mod = module_info_new ();
  579.  
  580.   mod->fullpath = g_strdup (filename);
  581.   mod->ondisk = TRUE;
  582.   mod->state = ST_MODULE_ERROR;
  583.  
  584.   mod->info = NULL;
  585.   mod->module = NULL;
  586.   mod->last_module_error = NULL;
  587.   mod->init = NULL;
  588.   mod->unload = NULL;
  589.  
  590.   /* Count of times main gimp is within the module.  Normally, this
  591.    * will be 1, and we assume that the module won't call its
  592.    * unload callback until it is satisfied that it's not in use any
  593.    * more.  refs can be 2 temporarily while we're running the module's
  594.    * unload function, to stop the module attempting to unload
  595.    * itself. */
  596.   mod->refs = 0;
  597.  
  598.   mod->load_inhibit = module_inhibited (mod->fullpath, module_db_load_inhibit);
  599.   if (!mod->load_inhibit)
  600.     {
  601.       if (be_verbose)
  602.     g_print (_("load module: \"%s\"\n"), filename);
  603.  
  604.       mod_load (mod, TRUE);
  605.     }
  606.   else
  607.     {
  608.       if (be_verbose)
  609.     g_print (_("skipping module: \"%s\"\n"), filename);
  610.  
  611.       mod->state = ST_UNLOADED_OK;
  612.     }
  613.  
  614.   gimp_set_add (modules, mod);
  615. }
  616.  
  617. static void
  618. mod_load (ModuleInfo *mod, 
  619.       gboolean    verbose)
  620. {
  621.   gpointer symbol;
  622.  
  623.   g_return_if_fail (mod->module == NULL);
  624.  
  625.   mod->module = g_module_open (mod->fullpath, G_MODULE_BIND_LAZY);
  626.   if (!mod->module)
  627.     {
  628.       mod->state = ST_MODULE_ERROR;
  629.  
  630.       if (mod->last_module_error)
  631.     g_free (mod->last_module_error);
  632.       mod->last_module_error = g_strdup (g_module_error ());
  633.  
  634.       if (verbose)
  635.     g_warning (_("module load error: %s: %s"),
  636.            mod->fullpath, mod->last_module_error);
  637.       return;
  638.     }
  639.  
  640. #ifdef __EMX__
  641.   if (g_module_symbol (mod->module, "gimp_main_funcs", &symbol))
  642.     {
  643.       *(struct main_funcs_struc **)symbol = gimp_main_funcs;
  644.     }
  645. #endif
  646.   /* find the module_init symbol */
  647.   if (!g_module_symbol (mod->module, "module_init", &symbol))
  648.     {
  649.       mod->state = ST_MODULE_ERROR;
  650.  
  651.       if (mod->last_module_error)
  652.     g_free (mod->last_module_error);
  653.       mod->last_module_error = g_strdup ("missing module_init() symbol");
  654.  
  655.       if (verbose)
  656.     g_warning ("%s: module_init() symbol not found", mod->fullpath);
  657.  
  658.       g_module_close (mod->module);
  659.       mod->module = NULL;
  660.       mod->info = NULL;
  661.       return;
  662.     }
  663.  
  664.   /* run module's initialisation */
  665.   mod->init = symbol;
  666.   mod->info = NULL;
  667.   gimp_module_ref (mod); /* loaded modules are assumed to have a ref of 1 */
  668.   if (mod->init (&mod->info) == GIMP_MODULE_UNLOAD)
  669.     {
  670.       mod->state = ST_LOAD_FAILED;
  671.       gimp_module_unref (mod);
  672.       mod->info = NULL;
  673.       return;
  674.     }
  675.  
  676.   /* module is now happy */
  677.   mod->state = ST_LOADED_OK;
  678.   TRC (("loaded module %s, state at %p\n", mod->fullpath, mod));
  679.  
  680.   /* do we have an unload function? */
  681.   if (g_module_symbol (mod->module, "module_unload", &symbol))
  682.     mod->unload = symbol;
  683.   else
  684.     mod->unload = NULL;
  685. }
  686.  
  687.  
  688. static void
  689. mod_unload_completed_callback (void *data)
  690. {
  691.   ModuleInfo *mod = data;
  692.  
  693.   g_return_if_fail (mod->state == ST_UNLOAD_REQUESTED);
  694.  
  695.   /* lose the ref we gave this module when we loaded it,
  696.    * since the module's now happy to be unloaded. */
  697.   gimp_module_unref (mod);
  698.   mod->info = NULL;
  699.  
  700.   mod->state = ST_UNLOADED_OK;
  701.  
  702.   TRC (("module unload completed callback for %p\n", mod));
  703.  
  704.   module_info_modified (mod);
  705. }
  706.  
  707. static void
  708. mod_unload (ModuleInfo *mod, 
  709.         gboolean    verbose)
  710. {
  711.   g_return_if_fail (mod->module != NULL);
  712.   g_return_if_fail (mod->unload != NULL);
  713.  
  714.   if (mod->state == ST_UNLOAD_REQUESTED)
  715.     return;
  716.  
  717.   mod->state = ST_UNLOAD_REQUESTED;
  718.  
  719.   TRC (("module unload requested for %p\n", mod));
  720.  
  721.   /* Send the unload request.  Need to ref the module so we don't
  722.    * accidentally unload it while this call is in progress (eg if the
  723.    * callback is called before the unload function returns). */
  724.   gimp_module_ref (mod);
  725.   mod->unload (mod->info->shutdown_data, mod_unload_completed_callback, mod);
  726.  
  727.   gtk_idle_add ((GtkFunction) mod_idle_unref, (gpointer) mod);
  728. }
  729.  
  730. static gboolean
  731. mod_idle_unref (ModuleInfo *mod)
  732. {
  733.   gimp_module_unref (mod);
  734.  
  735.   return FALSE;
  736. }
  737.  
  738. #ifdef DUMP_DB
  739. static void
  740. print_module_info (gpointer data, 
  741.            gpointer user_data)
  742. {
  743.   ModuleInfo *i = data;
  744.  
  745.   g_print ("\n%s: %s\n",
  746.        i->fullpath, statename[i->state]);
  747.   g_print ("  module:%p  lasterr:%s  init:%p  unload:%p\n",
  748.        i->module, i->last_module_error? i->last_module_error : "NONE",
  749.        i->init, i->unload);
  750.   if (i->info)
  751.     {
  752.       g_print ("  shutdown_data: %p\n"
  753.            "  purpose:   %s\n"
  754.            "  author:    %s\n"
  755.            "  version:   %s\n"
  756.            "  copyright: %s\n"
  757.            "  date:      %s\n",
  758.            i->info->shutdown_data,
  759.            i->info->purpose, i->info->author, i->info->version,
  760.            i->info->copyright, i->info->date);
  761.     }
  762. }
  763. #endif
  764.  
  765.  
  766.  
  767. /**************************************************************/
  768. /* UI functions */
  769.  
  770. static void
  771. browser_popdown_callback (GtkWidget *widget,
  772.               gpointer   data)
  773. {
  774.   gtk_widget_destroy (GTK_WIDGET (data));
  775. }
  776.  
  777. static void
  778. browser_destroy_callback (GtkWidget *widget,
  779.               gpointer   data)
  780. {
  781.   gtk_signal_disconnect_by_data (GTK_OBJECT (modules), data);
  782.   gimp_set_remove_handler (modules, modules_handler);
  783.   g_free (data);
  784. }
  785.  
  786. static void
  787. browser_load_inhibit_callback (GtkWidget *widget,
  788.                    gpointer   data)
  789. {
  790.   BrowserState *st = data;
  791.   gboolean new_value;
  792.  
  793.   g_return_if_fail (st->last_update != NULL);
  794.  
  795.   new_value = ! GTK_TOGGLE_BUTTON (widget)->active;
  796.  
  797.   if (new_value == st->last_update->load_inhibit)
  798.     return;
  799.  
  800.   st->last_update->load_inhibit = new_value;
  801.   module_info_modified (st->last_update);
  802.  
  803.   need_to_rewrite_modulerc = TRUE;
  804. }
  805.  
  806. static void
  807. browser_info_update (ModuleInfo   *mod, 
  808.              BrowserState *st)
  809. {
  810.   gint i;
  811.   const gchar *text[NUM_INFO_LINES - 1];
  812.   gchar *status;
  813.  
  814.   /* only update the info if we're actually showing it */
  815.   if (mod != st->last_update)
  816.     return;
  817.  
  818.   if (!mod)
  819.     {
  820.       for (i=0; i < NUM_INFO_LINES; i++)
  821.     gtk_label_set_text (GTK_LABEL (st->label[i]), "");
  822.       gtk_label_set_text (GTK_LABEL(st->button_label), _("<No modules>"));
  823.       gtk_widget_set_sensitive (GTK_WIDGET (st->button), FALSE);
  824.       gtk_widget_set_sensitive (GTK_WIDGET (st->load_inhibit_check), FALSE);
  825.       return;
  826.     }
  827.  
  828.   if (mod->info)
  829.     {
  830.       text[0] = mod->info->purpose;
  831.       text[1] = mod->info->author;
  832.       text[2] = mod->info->version;
  833.       text[3] = mod->info->copyright;
  834.       text[4] = mod->info->date;
  835.       text[5] = mod->ondisk? _("on disk") : _("only in memory");
  836.     }
  837.   else
  838.     {
  839.       text[0] = "--";
  840.       text[1] = "--";
  841.       text[2] = "--";
  842.       text[3] = "--";
  843.       text[4] = "--";
  844.       text[5] = mod->ondisk? _("on disk") : _("nowhere (click 'refresh')");
  845.     }
  846.  
  847.   if (mod->state == ST_MODULE_ERROR && mod->last_module_error)
  848.     status = g_strdup_printf ("%s (%s)", gettext (statename[mod->state]),
  849.                   mod->last_module_error);
  850.   else
  851.     {
  852.       status = g_strdup (gettext (statename[mod->state]));
  853.     }
  854.  
  855.   for (i=0; i < NUM_INFO_LINES - 1; i++)
  856.     {
  857.       gtk_label_set_text (GTK_LABEL (st->label[i]), gettext (text[i]));
  858.     }
  859.  
  860.   gtk_label_set_text (GTK_LABEL (st->label[NUM_INFO_LINES-1]), status);
  861.  
  862.   g_free (status);
  863.  
  864.   gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (st->load_inhibit_check),
  865.                 !mod->load_inhibit);
  866.   gtk_widget_set_sensitive (GTK_WIDGET (st->load_inhibit_check), TRUE);
  867.  
  868.   /* work out what the button should do (if anything) */
  869.   switch (mod->state)
  870.     {
  871.     case ST_MODULE_ERROR:
  872.     case ST_LOAD_FAILED:
  873.     case ST_UNLOADED_OK:
  874.       gtk_label_set_text (GTK_LABEL(st->button_label), _("Load"));
  875.       gtk_widget_set_sensitive (GTK_WIDGET (st->button), mod->ondisk);
  876.       break;
  877.  
  878.     case ST_UNLOAD_REQUESTED:
  879.       gtk_label_set_text (GTK_LABEL(st->button_label), _("Unload"));
  880.       gtk_widget_set_sensitive (GTK_WIDGET (st->button), FALSE);
  881.       break;
  882.  
  883.     case ST_LOADED_OK:
  884.       gtk_label_set_text (GTK_LABEL(st->button_label), _("Unload"));
  885.       gtk_widget_set_sensitive (GTK_WIDGET (st->button),
  886.                 mod->unload? TRUE : FALSE);
  887.       break;    
  888.     }
  889. }
  890.  
  891. static void
  892. browser_info_init (BrowserState *st, 
  893.            GtkWidget    *table)
  894. {
  895.   GtkWidget *label;
  896.   gint i;
  897.  
  898.   gchar *text[] =
  899.   {
  900.     N_("Purpose:"),
  901.     N_("Author:"),
  902.     N_("Version:"),
  903.     N_("Copyright:"),
  904.     N_("Date:"),
  905.     N_("Location:"),
  906.     N_("State:")
  907.   };
  908.  
  909.   for (i=0; i < sizeof(text) / sizeof(char *); i++)
  910.     {
  911.       label = gtk_label_new (gettext (text[i]));
  912.       gtk_misc_set_alignment (GTK_MISC (label), 1.0, 0.5);
  913.       gtk_table_attach (GTK_TABLE (table), label, 0, 1, i, i+1,
  914.             GTK_SHRINK | GTK_FILL, GTK_SHRINK | GTK_FILL, 0, 2);
  915.       gtk_widget_show (label);
  916.  
  917.       st->label[i] = gtk_label_new ("");
  918.       gtk_misc_set_alignment (GTK_MISC (st->label[i]), 0.0, 0.5);
  919.       gtk_table_attach (GTK_TABLE (st->table), st->label[i], 1, 2, i, i+1,
  920.             GTK_SHRINK | GTK_FILL, GTK_SHRINK | GTK_FILL, 0, 2);
  921.       gtk_widget_show (st->label[i]);
  922.     }
  923.  
  924.   st->load_inhibit_check =
  925.     gtk_check_button_new_with_label (_("Autoload during startup"));
  926.   gtk_widget_show (st->load_inhibit_check);
  927.   gtk_table_attach (GTK_TABLE (table), st->load_inhibit_check,
  928.             0, 2, i, i+1,
  929.             GTK_SHRINK | GTK_FILL, GTK_SHRINK | GTK_FILL, 0, 2);
  930.   gtk_signal_connect (GTK_OBJECT (st->load_inhibit_check), "toggled",
  931.               browser_load_inhibit_callback, st);
  932. }
  933.  
  934. static void
  935. browser_select_callback (GtkWidget *widget, 
  936.              GtkWidget *child)
  937. {
  938.   ModuleInfo *i;
  939.   BrowserState *st;
  940.  
  941.   i = gtk_object_get_user_data (GTK_OBJECT (child));
  942.   st = gtk_object_get_user_data (GTK_OBJECT (widget));
  943.  
  944.   if (st->last_update == i)
  945.     return;
  946.  
  947.   st->last_update = i;
  948.  
  949.   browser_info_update (st->last_update, st);
  950. }
  951.  
  952.  
  953. static void
  954. browser_load_unload_callback (GtkWidget *widget, 
  955.                   gpointer   data)
  956. {
  957.   BrowserState *st = data;
  958.  
  959.   if (st->last_update->state == ST_LOADED_OK)
  960.     mod_unload (st->last_update, FALSE);
  961.   else
  962.     mod_load (st->last_update, FALSE);
  963.  
  964.   module_info_modified (st->last_update);
  965. }
  966.  
  967.  
  968. static void
  969. make_list_item (gpointer data, 
  970.         gpointer user_data)
  971. {
  972.   ModuleInfo   *info = data;
  973.   BrowserState *st = user_data;
  974.   GtkWidget    *list_item;
  975.  
  976.   if (!st->last_update)
  977.     st->last_update = info;
  978.  
  979.   list_item = gtk_list_item_new_with_label (info->fullpath);
  980.  
  981.   gtk_widget_show (list_item);
  982.   gtk_object_set_user_data (GTK_OBJECT (list_item), info);
  983.  
  984.   gtk_container_add (GTK_CONTAINER (st->list), list_item);
  985. }
  986.  
  987.  
  988. static void
  989. browser_info_add (GimpSet      *set, 
  990.           ModuleInfo   *mod, 
  991.           BrowserState *st)
  992. {
  993.   make_list_item (mod, st);
  994. }
  995.  
  996.  
  997. static void
  998. browser_info_remove (GimpSet      *set, 
  999.              ModuleInfo   *mod, 
  1000.              BrowserState *st)
  1001. {
  1002.   GList *dlist, *free_list;
  1003.   GtkWidget *list_item;
  1004.   ModuleInfo *i;
  1005.  
  1006.   dlist = gtk_container_children (GTK_CONTAINER (st->list));
  1007.   free_list = dlist;
  1008.  
  1009.   while (dlist)
  1010.   {
  1011.     list_item = dlist->data;
  1012.  
  1013.     i = gtk_object_get_user_data (GTK_OBJECT (list_item));
  1014.     g_return_if_fail (i != NULL);
  1015.  
  1016.     if (i == mod)
  1017.     {
  1018.       gtk_container_remove (GTK_CONTAINER (st->list), list_item);
  1019.       g_list_free(free_list);
  1020.       return;
  1021.     }
  1022.  
  1023.     dlist = dlist->next;
  1024.   }
  1025.  
  1026.   g_warning ("tried to remove module that wasn't in brower's list");
  1027.   g_list_free(free_list);
  1028. }
  1029.  
  1030.  
  1031.  
  1032. static void
  1033. module_db_module_ondisk (gpointer data, 
  1034.              gpointer user_data)
  1035. {
  1036.   ModuleInfo *mod = data;
  1037.   struct stat statbuf;
  1038.   gint ret;
  1039.   gint old_ondisk = mod->ondisk;
  1040.   GSList **kill_list = user_data;
  1041.  
  1042.   ret = stat (mod->fullpath, &statbuf);
  1043.   if (ret != 0)
  1044.     mod->ondisk = FALSE;
  1045.   else
  1046.     mod->ondisk = TRUE;
  1047.  
  1048.   /* if it's not on the disk, and it isn't in memory, mark it to be
  1049.    * removed later. */
  1050.   if (!mod->ondisk && !mod->module)
  1051.     {
  1052.       *kill_list = g_slist_append (*kill_list, mod);
  1053.       mod = NULL;
  1054.     }
  1055.  
  1056.   if (mod && mod->ondisk != old_ondisk)
  1057.     module_info_modified (mod);
  1058. }
  1059.  
  1060.  
  1061. static void
  1062. module_db_module_remove (gpointer data, 
  1063.              gpointer user_data)
  1064. {
  1065.   ModuleInfo *mod = data;
  1066.  
  1067.   gimp_set_remove (modules, mod);
  1068.  
  1069.   module_info_free (mod);
  1070. }
  1071.  
  1072.  
  1073.  
  1074. typedef struct
  1075. {
  1076.   const gchar *search_key;
  1077.   ModuleInfo  *found;
  1078. } find_by_path_closure;
  1079.  
  1080. static void
  1081. module_db_path_cmp (gpointer data, 
  1082.             gpointer user_data)
  1083. {
  1084.   ModuleInfo *mod = data;
  1085.   find_by_path_closure *cl = user_data;
  1086.  
  1087.   if (!strcmp (mod->fullpath, cl->search_key))
  1088.     cl->found = mod;
  1089. }
  1090.  
  1091. static ModuleInfo *
  1092. module_find_by_path (const char *fullpath)
  1093. {
  1094.   find_by_path_closure cl;
  1095.  
  1096.   cl.found = NULL;
  1097.   cl.search_key = fullpath;
  1098.  
  1099.   gimp_set_foreach (modules, module_db_path_cmp, &cl);
  1100.  
  1101.   return cl.found;
  1102. }
  1103.  
  1104.  
  1105.  
  1106. static void
  1107. browser_refresh_callback (GtkWidget *widget, 
  1108.               gpointer   data)
  1109. {
  1110.   GSList *kill_list = NULL;
  1111.  
  1112.   /* remove modules we don't have on disk anymore */
  1113.   gimp_set_foreach (modules, module_db_module_ondisk, &kill_list);
  1114.   g_slist_foreach (kill_list, module_db_module_remove, NULL);
  1115.   g_slist_free (kill_list);
  1116.   kill_list = NULL;
  1117.  
  1118.   /* walk filesystem and add new things we find */
  1119.   datafiles_read_directories (module_path,
  1120.                   module_initialize, 0 /* no flags */);
  1121. }
  1122.  
  1123.  
  1124. static void
  1125. gimp_module_ref (ModuleInfo *mod)
  1126. {
  1127.   g_return_if_fail (mod->refs >= 0);
  1128.   g_return_if_fail (mod->module != NULL);
  1129.   mod->refs++;
  1130. }
  1131.  
  1132. static void
  1133. gimp_module_unref (ModuleInfo *mod)
  1134. {
  1135.   g_return_if_fail (mod->refs > 0);
  1136.   g_return_if_fail (mod->module != NULL);
  1137.  
  1138.   mod->refs--;
  1139.  
  1140.   if (mod->refs == 0)
  1141.     {
  1142.       TRC (("module %p refs hit 0, g_module_closing it\n", mod));
  1143.       g_module_close (mod->module);
  1144.       mod->module = NULL;
  1145.     }
  1146. }
  1147.  
  1148. /* End of module_db.c */
  1149.